home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 1999 February / Software of the Month - Ultimate Collection Shareware 258.iso / pc / backvol.dir / 00001_Script_1 next >
Text File  |  1998-12-07  |  3KB  |  131 lines
  1.  
  2. on startMovie
  3.   
  4.   
  5.   --* This declares the variables for the finger cursor. *
  6.   
  7.   global BVFINGER, BVFINGERMASK
  8.   set BVFINGER to the memberNum of member "Finger1"
  9.   set BVFINGERMASK to the memberNum of member "Finger2"
  10.   
  11.   glowClear()
  12.   
  13. end
  14.  
  15.  
  16.  
  17.  
  18. --* This handler hides/shows the glow images. eg: glow(5,TRUE) *
  19.  
  20. on glow WHICHSPRITE, TRUEORFALSE
  21.   set the visible of sprite WHICHSPRITE to TRUEORFALSE
  22. end glow
  23.  
  24. --* TURN OF ALL GLOWS ON START
  25. on glowClear
  26.   repeat with i = 20 to 31
  27.     glow(i)
  28.   end repeat
  29.   glow(6)
  30.   glow(7)
  31. end
  32.  
  33. --* This handler switches the text color for a glow effect. eg.textglow("Hello",1)*
  34.  
  35. on textglow WHICHMEMBER, COLORNUMBER
  36.   set the foreColor of member WHICHMEMBER to COLORNUMBER  
  37. end textglow
  38.  
  39.  
  40. --* THIS HANDLER EXAMPLE OF DISABLEING HOTSPOTS WHEN RUNNING MIAW*
  41. --on mouseEnter
  42. --  if not count(the windowList) then
  43. --    doRollover(52)
  44. --  end if
  45. --end
  46. --
  47. --
  48. --on mouseLeave
  49. --  if not count(the windowList) then
  50. --    doRollout(52)
  51. --  end if
  52. --end
  53.  
  54.  
  55.  
  56. --* THIS HANDLER OPEN AND CENTERS A MOVIE IN A WINDOW *
  57.  
  58. on openMIAW MYWINDOW
  59.   set myRect=the rect of window MYWINDOW
  60.   set myStage=the rect of the Stage
  61.   set myWidth=(getAt(myRect,3)-getAt(myRect,1))
  62.   set myHeight=(getAt(myRect,4)-getAt(myRect,2))
  63.   set myLocH=((getAt(myStage,3)+getAt(myStage,1))/2)-(myWidth/2)
  64.   set myLocV=((getAt(myStage,2)+getAt(myStage,4))/2)-(myHeight/2)
  65.   set myNewRect=rect(myLocH,myLocV,(myLocH+myWidth),(myLocV+myHeight))
  66.   set the rect of window MYWINDOW=myNewRect
  67.   set the windowType of window MYWINDOW to 2
  68.   open window MYWINDOW
  69. end openMIAW
  70.  
  71.  
  72. --* THESE HANDLERS TURN ON A GLOW, TURN POINTER A HAND AND PLAYS A SOUND *
  73.  
  74. on doRollover numsprite
  75.   glow(numsprite,TRUE)
  76.   global BVfinger,BVfingermask
  77.   cursor[BVfinger,BVfingermask]
  78.   updatestage
  79.   puppetsound 1, "Scissors"
  80.   --  repeat while soundbusy(1)
  81.   --  end repeat
  82. end
  83.  
  84.  
  85. on doRollover2 numsprite
  86.   glow(numsprite,TRUE)
  87.   global BVfinger,BVfingermask
  88.   cursor[BVfinger,BVfingermask]
  89.   updatestage
  90.     puppetsound 1, "butane"
  91. --    repeat while soundbusy(1)
  92. --    end repeat
  93. end
  94.  
  95. on doRollover3 numsprite
  96.   glow(numsprite,TRUE)
  97.   global BVfinger,BVfingermask
  98.   cursor[BVfinger,BVfingermask]
  99.   updatestage
  100.   --  puppetsound 1, "rollsound2"
  101.   --  repeat while soundbusy(1)
  102.   --  end repeat
  103. end
  104.  
  105. -- Delays for x number of seconds
  106. on timedelay SECONDS 
  107.   startTimer
  108.   repeat while the timer < SECONDS * 60
  109.     nothing
  110.   end repeat    
  111. end
  112.  
  113.  
  114. --* THIS HANDLER TURNS THE SPRITE PASSED TO IT TO INVISIBLE AND RESETS THE CURSOR
  115. on doRollout numsprite
  116.   glow(numsprite,FALSE)
  117.   cursor 0
  118. end
  119.  
  120. --* PLAYS A CLICK SOUND
  121.  
  122. on doClick
  123.   puppetsound 1,"close"
  124.   updateStage
  125. end
  126.  
  127.  
  128.  
  129.  
  130.  
  131.